CAAPlanetPerihelionAphelion_UranusAphelion <-
function(k){
.Call("CAAPlanetPerihelionAphelion_UranusAphelion", k)
}
